'Application.ModelessCmd("so")
Application.ExecuteCommand("Set Origin")